home *** CD-ROM | disk | FTP | other *** search

---

/ Developer Source 4 / developer source - volume 4.iso / parad / mar94 / sr_fig09.gif

< prev

next >

Graphics Interchange Format  |  1995-09-26  |  8KB  |  641x352  |  4-bit (5 colors)

Labels: text | electronics | screenshot | display | software | font | number | web page
OCR: SYSGAUGE :: #Form1 :: proc* proc displaybars() = GetFreeSystemResources ( 0) txPercent = strVal (LongInt(w) ) + "% Free" = W * 40 bxProgress.setPosition(x,y,w,h) = GetFreeSystemResources (1) txPercent1 = strVal(longint(w) ) + "% Free" = W * 40 bxProgress1.setPosition(x,y, w,h) = GetFreeSystemResources (2) txPercent2 = strVal(LongInt(w) ) + "% Free" W * 40 bxProgress2.setPosition(x,y, w,h) endProc Edit Line: Col: 1

---